Easy Tennis/Easy Tennis.iso/pc/program/logo.dxr/Lingo_3.ls

Text File | 1998-03-24 | 169 b | 11 lines

on exitFrame
  hDecreaseSoundEffect()
end

on hDecreaseSoundEffect
  repeat with i = 255 down to 0
    set the volume of sound 1 to i
    updateStage()
  end repeat
end